inherited FCadastroKit: TFCadastroKit
  Left = 243
  Top = 171
  Caption = 'Kit Manuten'#231#227'o'
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 16
  inherited pcCadastro: TPageControl
    ActivePage = TsCadastro
    TabIndex = 1
    inherited TsPesquisa: TTabSheet
      inherited dbgPesquisaPadra: TDBGrid
        Columns = <
          item
            Expanded = False
            FieldName = 'KIT_CODIGO'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'KIT_DESCRICAO'
            Width = 600
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'KIT_OBSERVACAO'
            Width = 710
            Visible = True
          end>
      end
    end
    inherited TsCadastro: TTabSheet
      inherited panel1: TPanel
        inherited panel2: TPanel
          inherited DBNavigator1: TDBNavigator
            Hints.Strings = ()
          end
          object BtnImprimir: TBitBtn
            Left = 312
            Top = 5
            Width = 100
            Height = 25
            Caption = 'Emi&tir'
            TabOrder = 6
            OnClick = BtnImprimirClick
            Glyph.Data = {
              66010000424D6601000000000000760000002800000014000000140000000100
              040000000000F000000000000000000000001000000010000000000000000000
              8000008000000080800080000000800080008080000080808000C0C0C0000000
              FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
              DDDDDDDD0000DDDDDDDDDDDDDDDDDDDD0000DD000DDDDDDDDDD000DD0000D000
              000000000000000D0000D0F8888888888888880D0000D0F8888888888888880D
              0000D0F8888888822899880D0000D0FFFFFFFFFFFFFFFF0D0000D70077777777
              7777007D0000DDD00000000000000DDD0000DDD00FFFFFFFFFF00DDD0000DDDD
              0F00000000F0DDDD0000DDDD0FFFFFFFFFF0DDDD0000DDDD0F00000000F0DDDD
              0000DDDD0FFFFFFFFFF0DDDD0000DDDD0F00FFFFFFF0DDDD0000DDDD0FFFFFFF
              FFF0DDDD0000DDDD000000000000DDDD0000DDDDDDDDDDDDDDDDDDDD0000DDDD
              DDDDDDDDDDDDDDDD0000}
          end
        end
        object PageControl1: TPageControl
          Left = 1
          Top = 36
          Width = 842
          Height = 389
          ActivePage = TabSheet1
          Align = alClient
          TabIndex = 0
          TabOrder = 2
          object TabSheet1: TTabSheet
            Caption = 'Kit'
            object Label66: TLabel
              Left = 3
              Top = 7
              Width = 40
              Height = 16
              Caption = 'C'#243'digo'
              Font.Charset = ANSI_CHARSET
              Font.Color = clBlack
              Font.Height = -13
              Font.Name = 'Arial'
              Font.Style = []
              ParentFont = False
            end
            object Label1: TLabel
              Left = 3
              Top = 55
              Width = 58
              Height = 16
              Caption = 'Descri'#231#227'o'
              Font.Charset = ANSI_CHARSET
              Font.Color = clBlack
              Font.Height = -13
              Font.Name = 'Arial'
              Font.Style = []
              ParentFont = False
            end
            object Label2: TLabel
              Left = 3
              Top = 109
              Width = 68
              Height = 16
              Caption = 'Observa'#231#227'o'
              Font.Charset = ANSI_CHARSET
              Font.Color = clBlack
              Font.Height = -13
              Font.Name = 'Arial'
              Font.Style = []
              ParentFont = False
            end
            object DbeKitObservacao: TDBEdit
              Left = 3
              Top = 128
              Width = 720
              Height = 22
              Ctl3D = False
              DataField = 'KIT_OBSERVACAO'
              DataSource = dsCadastro
              ParentCtl3D = False
              TabOrder = 2
            end
            object DBEKitDescricao: TDBEdit
              Left = 3
              Top = 75
              Width = 720
              Height = 22
              Ctl3D = False
              DataField = 'KIT_DESCRICAO'
              DataSource = dsCadastro
              ParentCtl3D = False
              TabOrder = 1
            end
            object DBECODIGO: TDBEdit
              Left = 3
              Top = 27
              Width = 94
              Height = 22
              Ctl3D = False
              DataField = 'KIT_CODIGO'
              DataSource = dsCadastro
              ParentCtl3D = False
              ReadOnly = True
              TabOrder = 0
            end
          end
          object TTabSheet
            Caption = 'Itens'
            ImageIndex = 1
            object Label3: TLabel
              Left = 3
              Top = 45
              Width = 40
              Height = 16
              Caption = 'C'#243'digo'
              Font.Charset = ANSI_CHARSET
              Font.Color = clBlack
              Font.Height = -13
              Font.Name = 'Arial'
              Font.Style = []
              ParentFont = False
            end
            object Label24: TLabel
              Left = 81
              Top = 45
              Width = 122
              Height = 16
              Caption = 'Descri'#231#227'o Sa'#237'da (F8)'
              Font.Charset = ANSI_CHARSET
              Font.Color = clBlack
              Font.Height = -13
              Font.Name = 'Arial'
              Font.Style = []
              ParentFont = False
            end
            object Label35: TLabel
              Left = 537
              Top = 45
              Width = 66
              Height = 16
              Caption = 'Quantidade'
            end
            object Panel4: TPanel
              Left = 0
              Top = 0
              Width = 834
              Height = 33
              Align = alTop
              TabOrder = 3
              object BitInseriItem: TBitBtn
                Tag = 10
                Left = 3
                Top = 5
                Width = 80
                Height = 23
                Caption = '&Incluir'
                TabOrder = 0
                OnClick = BitInseriItemClick
                Glyph.Data = {
                  76010000424D7601000000000000760000002800000020000000100000000100
                  04000000000000010000130B0000130B00001000000000000000000000000000
                  800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
                  FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
                  333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
                  0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
                  07333337F3FF3FFF7F333330F00F000F07333337F77377737F333330FFFFFFFF
                  07333FF7F3FFFF3F7FFFBBB0F0000F0F0BB37777F7777373777F3BB0FFFFFFFF
                  0BBB3777F3FF3FFF77773330F00F000003333337F773777773333330FFFF0FF0
                  33333337F3FF7F37F3333330F08F0F0B33333337F7737F77FF333330FFFF003B
                  B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
                  3BB33773333773333773B333333B3333333B7333333733333337}
                NumGlyphs = 2
              end
              object BitEditarItem: TBitBtn
                Tag = 10
                Left = 90
                Top = 5
                Width = 80
                Height = 23
                Caption = '&Editar'
                TabOrder = 1
                OnClick = BitEditarItemClick
                Glyph.Data = {
                  76010000424D7601000000000000760000002800000020000000100000000100
                  04000000000000010000120B0000120B00001000000000000000000000000000
                  800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
                  FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
                  000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
                  00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
                  F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
                  0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
                  FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
                  FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
                  0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
                  00333377737FFFFF773333303300000003333337337777777333}
                NumGlyphs = 2
              end
              object BitExcluirItem: TBitBtn
                Tag = 10
                Left = 177
                Top = 5
                Width = 80
                Height = 23
                Caption = '&Excluir'
                TabOrder = 2
                OnClick = BitExcluirItemClick
                Glyph.Data = {
                  B2050000424DB205000000000000360400002800000012000000130000000100
                  0800000000007C010000C30E0000C30E00000001000000000000000000007B00
                  0000BD000000FF0000007B7B000000FF0000FFFF000000315A0008427300084A
                  730000007B007B007B00084A7B0008527B0021527B00007B7B007B7B7B00004A
                  840008528400105284002963840008528C00085A8C00185A8C0018638C002963
                  8C0008529400185A9400296B9400316B94002973940031739400085A9C001863
                  9C0018739C0029739C0031739C0031849C00005AA5002173A5003973A500297B
                  A500186BAD00106BB500317BB5002984B5004A8CB500086BBD000073BD001073
                  BD001873BD00217BBD004284BD00318CBD004A8CBD005294BD005A9CBD00BDBD
                  BD001073C600007BC600217BC600428CC6004A8CC6005A9CC6000084CE000884
                  CE00398CCE005A9CCE00639CCE001884D6002184D600088CD600108CD6004294
                  D600399CD6004A9CD600529CD6005A9CD6005AA5D60063ADD6001884DE002184
                  DE00188CDE001094DE001894DE003194DE00299CDE004AA5DE005AA5DE004AB5
                  DE00189CE700219CE700429CE7005AA5E7005AADE70063ADE7006BB5E70021A5
                  EF0029A5EF0031A5EF0063B5EF006BBDEF0029ADF70031ADF7006BBDF7000000
                  FF00FF00FF0031B5FF0039B5FF0042B5FF0039BDFF0042BDFF0042C6FF004AC6
                  FF006BC6FF004ACEFF0052CEFF0052D6FF005ADEFF0063E7FF0000FFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00393939393939
                  3939393939393939393939690000396939393939393939393939393939396939
                  0000396969393910101010101010101010693939000039696969000000000000
                  0000000069693939000039396969007879797978797979696939393900003939
                  3969697903030303030379691039393900003939396969697978797979786969
                  1039393900003939393969696903030369696900103939390000393939390069
                  6969797869697900103939390000393939390079036969696903790010393939
                  0000393939390079796969696978790010393939000039393939007903696969
                  6900000010393939000039393939007869697900696979001039393900003939
                  3939006969697900696969693939393900003939396969697978790079003969
                  6939393900003969696969000000000000393939696939390000396969693939
                  3939393939393939393969390000393939393939393939393939393939393969
                  00003939393939393939393939393939393939390000}
              end
              object DBNitens: TDBNavigator
                Tag = 11
                Left = 728
                Top = 5
                Width = 80
                Height = 23
                DataSource = dsItensKit
                VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
                TabOrder = 3
              end
              object stItens: TStaticText
                Left = 603
                Top = 9
                Width = 117
                Height = 20
                Alignment = taRightJustify
                Caption = ' Reg: 10000/10000 '
                TabOrder = 4
              end
            end
            object DBGrid1: TDBGrid
              Left = 0
              Top = 144
              Width = 834
              Height = 214
              Align = alBottom
              DataSource = dsItensKit
              Options = [dgEditing, dgTitles, dgIndicator, dgColumnResize, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
              TabOrder = 4
              TitleFont.Charset = ANSI_CHARSET
              TitleFont.Color = clWindowText
              TitleFont.Height = -13
              TitleFont.Name = 'Arial'
              TitleFont.Style = []
              Columns = <
                item
                  Alignment = taCenter
                  Expanded = False
                  FieldName = 'ITENS_KIT_PRODCODIGO'
                  Title.Caption = 'C'#243'digo'
                  Visible = True
                end
                item
                  Expanded = False
                  FieldName = 'ITENS_KIT_PROD_DESC'
                  Title.Caption = 'Produto'
                  Width = 440
                  Visible = True
                end
                item
                  Alignment = taCenter
                  Expanded = False
                  FieldName = 'ITENS_KIT_QTD'
                  Title.Caption = 'Quantidade'
                  Width = 100
                  Visible = True
                end>
            end
            object Panel6: TPanel
              Left = 0
              Top = 111
              Width = 834
              Height = 33
              Align = alBottom
              TabOrder = 2
              object BitSalvarItem: TBitBtn
                Tag = 10
                Left = 656
                Top = 5
                Width = 80
                Height = 23
                Caption = '&Salvar'
                TabOrder = 0
                OnClick = BitSalvarItemClick
                Glyph.Data = {
                  76010000424D7601000000000000760000002800000020000000100000000100
                  04000000000000010000130B0000130B00001000000000000000000000000000
                  800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
                  FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333330070
                  7700333333337777777733333333008088003333333377F73377333333330088
                  88003333333377FFFF7733333333000000003FFFFFFF77777777000000000000
                  000077777777777777770FFFFFFF0FFFFFF07F3333337F3333370FFFFFFF0FFF
                  FFF07F3FF3FF7FFFFFF70F00F0080CCC9CC07F773773777777770FFFFFFFF039
                  99337F3FFFF3F7F777F30F0000F0F09999937F7777373777777F0FFFFFFFF999
                  99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339
                  99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999
                  93337FFFF7737777733300000033333333337777773333333333}
                NumGlyphs = 2
              end
              object BitCancelarItem: TBitBtn
                Tag = 10
                Left = 742
                Top = 5
                Width = 80
                Height = 23
                Caption = '&Cancelar'
                TabOrder = 1
                OnClick = BitCancelarItemClick
                Glyph.Data = {
                  76010000424D7601000000000000760000002800000020000000100000000100
                  04000000000000010000130B0000130B00001000000000000000000000000000
                  800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
                  FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
                  3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
                  33333337777FF377FF3333993370739993333377FF373F377FF3399993000339
                  993337777F777F3377F3393999707333993337F77737333337FF993399933333
                  399377F3777FF333377F993339903333399377F33737FF33377F993333707333
                  399377F333377FF3377F993333101933399377F333777FFF377F993333000993
                  399377FF3377737FF7733993330009993933373FF3777377F7F3399933000399
                  99333773FF777F777733339993707339933333773FF7FFF77333333999999999
                  3333333777333777333333333999993333333333377777333333}
                NumGlyphs = 2
              end
            end
            object DBLCBProdutoMercadoria: TDBLookupComboBox
              Tag = 10
              Left = 81
              Top = 61
              Width = 449
              Height = 22
              Hint = '(F3) Visualizar Descri'#231#227'o - (F7) Todos - (F8) Cliente'
              Ctl3D = False
              DataField = 'ITENS_KIT_PRODCODIGO'
              DataSource = dsItensKit
              Font.Charset = ANSI_CHARSET
              Font.Color = clBlack
              Font.Height = -13
              Font.Name = 'Arial'
              Font.Style = []
              KeyField = 'PROD_CODIGO'
              ListField = 'PROD_DESCRICAOSAI'
              ListSource = DsProduto
              ParentCtl3D = False
              ParentFont = False
              ParentShowHint = False
              ShowHint = True
              TabOrder = 0
              OnKeyDown = DBLCBProdutoMercadoriaKeyDown
            end
            object RxDBCQtd: TRxDBCalcEdit
              Tag = 10
              Left = 537
              Top = 61
              Width = 71
              Height = 22
              DataField = 'ITENS_KIT_QTD'
              DataSource = dsItensKit
              Alignment = taCenter
              Ctl3D = False
              DecimalPlaces = 0
              DisplayFormat = '0.,####'
              ButtonWidth = 0
              NumGlyphs = 2
              ParentCtl3D = False
              TabOrder = 1
            end
            object EdCodProdutoMercadoria: TEdit
              Tag = 10
              Left = 3
              Top = 61
              Width = 71
              Height = 22
              Ctl3D = False
              Font.Charset = ANSI_CHARSET
              Font.Color = clBlack
              Font.Height = -13
              Font.Name = 'Arial'
              Font.Style = []
              ParentCtl3D = False
              ParentFont = False
              TabOrder = 5
              OnExit = EdCodProdutoMercadoriaExit
            end
          end
        end
      end
    end
  end
  inherited dsCadastro: TDataSource
    Left = 152
    Top = 256
  end
  inherited QCadastro: TQuery
    SQL.Strings = (
      'SELECT '
      '  KIT.KIT_CODIGO,'
      '  KIT.KIT_DESCRICAO,'
      '  KIT.KIT_OBSERVACAO,'
      '  KIT.USUARIO_CADASTRO,'
      '  KIT.USUARIO_AUTERACAO,'
      '  KIT.USUARIO_EXCLUSAO,'
      '  KIT.DATA_CADASTRO,'
      '  KIT.DATA_EXCLUSAO,'
      '  KIT.DATA_AUTERACAO,'
      '  KIT.EXCLUIDO'
      'FROM'
      '  KIT')
    Left = 152
    Top = 304
  end
  inherited dspCadastro: TDataSetProvider
    Left = 152
    Top = 352
  end
  inherited cdsCadastro: TClientDataSet
    AfterOpen = cdsCadastroAfterOpen
    Left = 152
    Top = 400
    object cdsCadastroKIT_CODIGO: TIntegerField
      Alignment = taCenter
      DisplayLabel = 'C'#243'digo'
      FieldName = 'KIT_CODIGO'
    end
    object cdsCadastroKIT_DESCRICAO: TStringField
      DisplayLabel = 'Descri'#231#227'o'
      FieldName = 'KIT_DESCRICAO'
      Size = 60
    end
    object cdsCadastroKIT_OBSERVACAO: TStringField
      DisplayLabel = 'Observa'#231#227'o'
      FieldName = 'KIT_OBSERVACAO'
      Size = 60
    end
    object cdsCadastroUSUARIO_CADASTRO: TStringField
      FieldName = 'USUARIO_CADASTRO'
    end
    object cdsCadastroUSUARIO_AUTERACAO: TStringField
      FieldName = 'USUARIO_AUTERACAO'
    end
    object cdsCadastroUSUARIO_EXCLUSAO: TStringField
      FieldName = 'USUARIO_EXCLUSAO'
    end
    object cdsCadastroDATA_CADASTRO: TDateTimeField
      FieldName = 'DATA_CADASTRO'
    end
    object cdsCadastroDATA_EXCLUSAO: TDateTimeField
      FieldName = 'DATA_EXCLUSAO'
    end
    object cdsCadastroDATA_AUTERACAO: TDateTimeField
      FieldName = 'DATA_AUTERACAO'
    end
    object cdsCadastroEXCLUIDO: TStringField
      FieldName = 'EXCLUIDO'
      FixedChar = True
      Size = 1
    end
  end
  inherited dsCamposPesquisa: TDataSource
    Left = 408
    Top = 48
  end
  inherited OpenDialog1: TOpenDialog
    Left = 280
    Top = 64
  end
  object DsProduto: TDataSource
    DataSet = QProduto
    Left = 392
    Top = 176
  end
  object dsItensKit: TDataSource
    DataSet = cdsItensKit
    OnStateChange = dsItensKitStateChange
    OnDataChange = dsItensKitDataChange
    Left = 264
    Top = 248
  end
  object cdsItensKit: TClientDataSet
    Aggregates = <>
    IndexFieldNames = 'ITENS_KIT_KITCODIGO'
    MasterFields = 'KIT_CODIGO'
    MasterSource = dsCadastro
    PacketRecords = 0
    Params = <>
    ProviderName = 'dspItensKit'
    Left = 256
    Top = 392
  end
  object dspItensKit: TDataSetProvider
    DataSet = qItensKit
    Constraints = True
    Left = 264
    Top = 344
  end
  object qItensKit: TQuery
    DatabaseName = 'base'
    DataSource = dsCadastro
    SQL.Strings = (
      'SELECT '
      '  ITENS_KIT.ITENS_KIT_CODIGO,'
      '  ITENS_KIT.ITENS_KIT_KITCODIGO,'
      '  ITENS_KIT.ITENS_KIT_PRODCODIGO,'
      '  ITENS_KIT.ITENS_KIT_QTD,'
      '  ITENS_KIT.ITENS_KIT_PROD_DESC,'
      '  ITENS_KIT.USUARIO_CADASTRO,'
      '  ITENS_KIT.USUARIO_EXCLUSAO,'
      '  ITENS_KIT.USUARIO_AUTERACAO,'
      '  ITENS_KIT.DATA_CADASTRO,'
      '  ITENS_KIT.DATA_EXCLUSAO,'
      '  ITENS_KIT.DATA_AUTERACAO,'
      '  ITENS_KIT.EXCLUIDO'
      'FROM'
      '  ITENS_KIT'
      'WHERE'
      '  ITENS_KIT.ITENS_KIT_KITCODIGO = :KIT_CODIGO')
    Left = 264
    Top = 296
    ParamData = <
      item
        DataType = ftInteger
        Name = 'ITENS_KIT_KITCODIGO'
        ParamType = ptUnknown
        Value = 1
      end>
  end
  object QProduto: TQuery
    Active = True
    DatabaseName = 'base'
    SQL.Strings = (
      'SELECT'
      ' *'
      'FROM'
      'PRODUTO'
      'WHERE '
      'PRODUTO.PROD_KIT = '#39'S'#39)
    Left = 440
    Top = 328
  end
end
